

*** VT creating coefficient histograms ***

	clear
	version 15.1
	set seed 1234
	cd  "/Users/rich/Dropbox/research/Rich & Ferran/EBA turnout/data/completed data/completed AWS data files (raw)/VT/"
	
 	
	global graph_options ",  xline(0, lcolor(red)) ytitle("") xtitle("") normal gap(25) ylabel(, angle(0) labsize(small))"

	* 1 *
	use eba_vt_1_aws.dta, clear
	 drop if vif1>7
	 hist coef if var=="africa" $graph_options title("Africa")
	graph save vt_h1c.gph, replace
	hist tstat if var=="africa" $graph_options title("Africa")	
	graph save vt_h1t.gph, replace
	

	* 2 *
	use eba_vt_2_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="asia" $graph_options title("Asia")
	graph save vt_h2c.gph, replace
	hist tstat if var=="asia" $graph_options title("Asia")	
	graph save vt_h2t.gph, replace	
	
	* 3 *
	use eba_vt_3_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="ban" $graph_options title("Ban")
	graph save vt_h3c.gph, replace
	hist tstat if var=="ban" $graph_options title("Ban")	
	graph save vt_h3t.gph, replace	
 
	* 4 *
	use eba_vt_4_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="boycott" $graph_options title("Boycott")
	graph save vt_h4c.gph, replace
	hist tstat if var=="ban" $graph_options title("Boycott")	
	graph save vt_h4t.gph, replace	
 
	* 5 *
	use eba_vt_5_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="competitive_s" $graph_options title("Competitiveness")
	graph save vt_h5c.gph, replace
	hist tstat if var=="competitive_s" $graph_options title("Competitiveness")	
	graph save vt_h5t.gph, replace	
 	
	* 6 *
	use eba_vt_6_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="concurrentsamedate" $graph_options title("Concurrent elections")
	graph save vt_h6c.gph, replace
	hist tstat if var=="concurrentsamedate" $graph_options title("Concurrent elections")	
	graph save vt_h6t.gph, replace	
 	
	* 7 *
	use eba_vt_7_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="dist_mag_s" $graph_options title("District magnitude")
	graph save vt_h7c.gph, replace
	hist tstat if var=="dist_mag_s" $graph_options title("District magnitude")	
	graph save vt_h7t.gph, replace			
	 
	* 8 *
	use eba_vt_8_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="econ_global_sl" $graph_options title("Economic globalization")
	graph save vt_h8c.gph, replace
	hist tstat if var=="econ_global_sl" $graph_options title("Economic globalization")	
	graph save vt_h8t.gph, replace		 
	 
	* 9 *
	use eba_vt_9_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="eeurope" $graph_options title("Eastern Europe")
	graph save vt_h9c.gph, replace
	hist tstat if var=="eeurope" $graph_options title("Eastern Europe")	
	graph save vt_h9t.gph, replace		
	
	* 10 *
	use eba_vt_10_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="election_2" $graph_options title("Second election")
	graph save vt_h10c.gph, replace
	hist tstat if var=="election_2" $graph_options title("Second election")	
	graph save vt_h10t.gph, replace		
	
	* 11 *
	use eba_vt_11_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="election_3" $graph_options title("Third election")
	graph save vt_h11c.gph, replace
	hist tstat if var=="election_3" $graph_options title("Third election")	
	graph save vt_h11t.gph, replace		
		
	* 12 *
	use eba_vt_12_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="election_3_4" $graph_options title("Third & fourth election")
	graph save vt_h12c.gph, replace
	hist tstat if var=="election_3_4" $graph_options title("Third & fourth election")	
	graph save vt_h12t.gph, replace		
	
	* 13 *
	use eba_vt_13_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="election_4" $graph_options title("Fourth election")
	graph save vt_h13c.gph, replace
	hist tstat if var=="election_4" $graph_options title("Fourth election")	
	graph save vt_h13t.gph, replace		
	
	* 14 *
	use eba_vt_14_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="election_5_6" $graph_options title("Fifth & sixth election")
	graph save vt_h14c.gph, replace
	hist tstat if var=="election_5_6" $graph_options title("Fifth & sixth election")	
	graph save vt_h14t.gph, replace		
	
	* 15 *
	use eba_vt_15_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="election_7_8" $graph_options title("Seventh & eighth election")
	graph save vt_h15c.gph, replace
	hist tstat if var=="election_7_8" $graph_options title("Seventh & eighth election")	
	graph save vt_h15t.gph, replace		
			
	* 16 *
	use eba_vt_16_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="enpp_s" $graph_options title("Eff. # political parties")
	graph save vt_h16c.gph, replace
	hist tstat if var=="enpp_s" $graph_options title("Eff. # political parties")	
	graph save vt_h16t.gph, replace		
		
	* 17 *
	use eba_vt_17_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="enpp_sq_s" $graph_options title("Eff. # political parties, squared")
	graph save vt_h17c.gph, replace
	hist tstat if var=="enpp_sq_s" $graph_options title("Eff. # political parties, squared")	
	graph save vt_h17t.gph, replace		
		
	* 18 *
	use eba_vt_18_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="exec_response" $graph_options title("Executive responsiveness")
	graph save vt_h18c.gph, replace
	hist tstat if var=="exec_response" $graph_options title("Executive responsiveness")	
	graph save vt_h18t.gph, replace		
				
	* 19 *
	use eba_vt_19_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="federalism" $graph_options title("Executive responsiveness")
	graph save vt_h19c.gph, replace
	hist tstat if var=="federalism" $graph_options title("Executive responsiveness")	
	graph save vt_h19t.gph, replace		
				
	* 20 *
	use eba_vt_20_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="fract_ethnic_s" $graph_options title("Ethnic fractionalization")
	graph save vt_h20c.gph, replace
	hist tstat if var=="fract_ethnic_s" $graph_options title("Ethnic fractionalization")	
	graph save vt_h20t.gph, replace		
			
	* 21 *
	use eba_vt_21_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="fract_lang_s" $graph_options title("Language fractionalization")
	graph save vt_h21c.gph, replace
	hist tstat if var=="fract_lang_s" $graph_options title("Language fractionalization")	
	graph save vt_h21t.gph, replace		
			
	* 22 *
	use eba_vt_22_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="fract_rel_s" $graph_options title("Religious fractionalization")
	graph save vt_h22c.gph, replace
	hist tstat if var=="fract_rel_s" $graph_options title("Religious fractionalization")	
	graph save vt_h22t.gph, replace		
		
	* 23 *
	use eba_vt_23_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="gini_sl" $graph_options title("GINI index")
	graph save vt_h23c.gph, replace
	hist tstat if var=="gini_sl" $graph_options title("GINI index")	
	graph save vt_h23t.gph, replace		
	
	* 24 *
	use eba_vt_24_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="gni_pc_growth_sl" $graph_options title("GNI growth")
	graph save vt_h24c.gph, replace
	hist tstat if var=="gni_pc_growth_sl" $graph_options title("GNI growth")	
	graph save vt_h24t.gph, replace		
	
	* 25 *
	use eba_vt_25_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="harassment" $graph_options title("Harassment")
	graph save vt_h25c.gph, replace
	hist tstat if var=="harassment" $graph_options title("Harassment")	
	graph save vt_h25t.gph, replace			
	
	* 26 *
	use eba_vt_26_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="hdi_index_s" $graph_options title("HDI index")
	graph save vt_h26c.gph, replace
	hist tstat if var=="hdi_index_s" $graph_options title("HDI index")	
	graph save vt_h26t.gph, replace			
	
	* 27 *
	use eba_vt_27_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="inflation_ln_sl" $graph_options title("Inflation")
	graph save vt_h27c.gph, replace
	hist tstat if var=="inflation_ln_sl" $graph_options title("Inflation")	
	graph save vt_h27t.gph, replace			
	
	* 28 *
	use eba_vt_28_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="islamic_majority" $graph_options title("Islamic majority")
	graph save vt_h28c.gph, replace
	hist tstat if var=="islamic_majority" $graph_options title("Islamic majority")	
	graph save vt_h28t.gph, replace			
	
	* 29 *
	use eba_vt_29_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="latin_america" $graph_options title("Latin America")
	graph save vt_h29c.gph, replace
	hist tstat if var=="latin_america" $graph_options title("Latin America")	
	graph save vt_h29t.gph, replace			
			
	* 30 *
	use eba_vt_30_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="leg_size_ln_s" $graph_options title("Legislature size")
	graph save vt_h30c.gph, replace
	hist tstat if var=="leg_size_ln_s" $graph_options title("Legislature size")	
	graph save vt_h30t.gph, replace		
	
	* 31 *
	use eba_vt_31_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="life_exp_sl" $graph_options title("Life expectancy")
	graph save vt_h31c.gph, replace
	hist tstat if var=="life_exp_sl" $graph_options title("Life expectancy")	
	graph save vt_h31t.gph, replace		
	
	* 32 *
	use eba_vt_32_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="maj_status_s" $graph_options title("Majoritarian status")
	graph save vt_h32c.gph, replace
	hist tstat if var=="maj_status_s" $graph_options title("Majoritarian status")	
	graph save vt_h32t.gph, replace				
	
	* 33 *
	use eba_vt_33_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="majoritarian" $graph_options title("Majoritarian system")
	graph save vt_h33c.gph, replace
	hist tstat if var=="majoritarian" $graph_options title("Majoritarian system")	
	graph save vt_h33t.gph, replace				
	
	* 34 *
	use eba_vt_34_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="mixed" $graph_options title("Mixed system")
	graph save vt_h34c.gph, replace
	hist tstat if var=="mixed" $graph_options title("Mixed system")	
	graph save vt_h34t.gph, replace				
	
	* 35 *
	use eba_vt_35_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="norway" $graph_options title("Norway")
	graph save vt_h35c.gph, replace
	hist tstat if var=="norway" $graph_options title("Norway")	
	graph save vt_h35t.gph, replace				
	
	* 36 *
	use eba_vt_36_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="num_elections_ln_s" $graph_options title("# elections")
	graph save vt_h36c.gph, replace
	hist tstat if var=="num_elections_ln_s" $graph_options title("# elections")	
	graph save vt_h36t.gph, replace				
	
	* 37 *
	use eba_vt_37_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="nz" $graph_options title("New Zealand")
	graph save vt_h37c.gph, replace
	hist tstat if var=="nz" $graph_options title("New Zealand")	
	graph save vt_h37t.gph, replace				
	
	* 38 *
	use eba_vt_38_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="oceania" $graph_options title("Oceania")
	graph save vt_h38c.gph, replace
	hist tstat if var=="oceania" $graph_options title("Oceania")	
	graph save vt_h38t.gph, replace				
			
	* 39 *
	use eba_vt_39_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="oecd" $graph_options title("OECD")
	graph save vt_h39c.gph, replace
	hist tstat if var=="oecd" $graph_options title("OECD")	
	graph save vt_h39t.gph, replace				
			
	* 40 *
	use eba_vt_40_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="party_frac_s" $graph_options title("Party fractionalization")
	graph save vt_h40c.gph, replace
	hist tstat if var=="party_frac_s" $graph_options title("Party fractionalization")	
	graph save vt_h40t.gph, replace				
			
	* 41 *
	use eba_vt_41_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="plurality" $graph_options title("Plurality system")
	graph save vt_h41c.gph, replace
	hist tstat if var=="plurality" $graph_options title("Plurality system")	
	graph save vt_h41t.gph, replace				
				
	* 42 *
	use eba_vt_42_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="polity2_sl" $graph_options title("Polity")
	graph save vt_h42c.gph, replace
	hist tstat if var=="polity2_sl" $graph_options title("Polity")	
	graph save vt_h42t.gph, replace				
				
	* 43 *
	use eba_vt_43_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="pop_density_ln_sl" $graph_options title("Population density")
	graph save vt_h43c.gph, replace
	hist tstat if var=="pop_density_ln_sl" $graph_options title("Population density")	
	graph save vt_h43t.gph, replace				
				
	* 44 *
	use eba_vt_44_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="prev_el_time_s" $graph_options title("Time since previous election")
	graph save vt_h44c.gph, replace
	hist tstat if var=="prev_el_time_s" $graph_options title("Time since previous election")	
	graph save vt_h44t.gph, replace				
				
	* 45 *
	use eba_vt_45_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="qual_democ" $graph_options title("Quality of democracy")
	graph save vt_h45c.gph, replace
	hist tstat if var=="qual_democ" $graph_options title("Quality of democracy")	
	graph save vt_h45t.gph, replace				
				
	* 46 *
	use eba_vt_46_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="radios_pc_ln_sl" $graph_options title("Radios")
	graph save vt_h46c.gph, replace
	hist tstat if var=="radios_pc_ln_sl" $graph_options title("Radios")	
	graph save vt_h46t.gph, replace				
				
	* 47 *
	use eba_vt_47_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="samerica" $graph_options title("South America")
	graph save vt_h47c.gph, replace
	hist tstat if var=="samerica" $graph_options title("South America")	
	graph save vt_h47t.gph, replace				
										
	* 48 *
	use eba_vt_48_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="share30to69ofVAP" $graph_options title("VAP aged 30-69")
	graph save vt_h48c.gph, replace
	hist tstat if var=="share30to69ofVAP" $graph_options title("VAP aged 30-69")	
	graph save vt_h48t.gph, replace				
										
	* 49 *
	use eba_vt_49_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="subnat_rev_sl" $graph_options title("Subnational revenue")
	graph save vt_h49c.gph, replace
	hist tstat if var=="subnat_rev_sl" $graph_options title("Subnational revenue")	
	graph save vt_h49t.gph, replace				
										
	* 50 *
	use eba_vt_50_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="subnat_exp_sl" $graph_options title("Subnational expenditure")
	graph save vt_h50c.gph, replace
	hist tstat if var=="subnat_exp_sl" $graph_options title("Subnational expenditure")	
	graph save vt_h50t.gph, replace				
										
	* 51 *
	use eba_vt_51_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="sufferage_s" $graph_options title("Female sufferage")
	graph save vt_h51c.gph, replace
	hist tstat if var=="sufferage_s" $graph_options title("Female sufferage")	
	graph save vt_h51t.gph, replace				
										
	* 52 *
	use eba_vt_52_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="suffreg" $graph_options title("Automatic registration")
	graph save vt_h52c.gph, replace
	hist tstat if var=="suffreg" $graph_options title("Automatic registration")	
	graph save vt_h52t.gph, replace				
										
	* 53 *
	use eba_vt_53_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="sweden" $graph_options title("Sweden")
	graph save vt_h53c.gph, replace
	hist tstat if var=="sweden" $graph_options title("Sweden")	
	graph save vt_h53t.gph, replace						
	
	* 54 *
	use eba_vt_54_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="swiss" $graph_options title("Switzerland")
	graph save vt_h54c.gph, replace
	hist tstat if var=="swiss" $graph_options title("Switzerland")	
	graph save vt_h54t.gph, replace						
	
	* 55 *
	use eba_vt_55_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="time_trend_s" $graph_options title("Time trend")
	graph save vt_h55c.gph, replace
	hist tstat if var=="time_trend_s" $graph_options title("Time trend")	
	graph save vt_h55t.gph, replace						
	
	* 56 *
	use eba_vt_56_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="unemployment_sl" $graph_options title("Unemployment")
	graph save vt_h56c.gph, replace
	hist tstat if var=="unemployment_sl" $graph_options title("Unemployment")	
	graph save vt_h56t.gph, replace						
	
	* 57 *
	use eba_vt_57_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="unicameral" $graph_options title("Unicameral")
	graph save vt_h57c.gph, replace
	hist tstat if var=="unicameral" $graph_options title("Unicameral")	
	graph save vt_h57t.gph, replace						
	
	* 58 *
	use eba_vt_58_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="union_density" $graph_options title("Union density")
	graph save vt_h58c.gph, replace
	hist tstat if var=="union_density" $graph_options title("Union density")	
	graph save vt_h58t.gph, replace						
	
	* 59 *
	use eba_vt_59_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="unionisation" $graph_options title("Unionisation")
	graph save vt_h59c.gph, replace
	hist tstat if var=="unionisation" $graph_options title("Unionisation")	
	graph save vt_h59t.gph, replace						
	
	* 60 *
	use eba_vt_60_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="urban_pop_pct_sl" $graph_options title("Urban population")
	graph save vt_h60c.gph, replace
	hist tstat if var=="urban_pop_pct_sl" $graph_options title("Urban population")	
	graph save vt_h60t.gph, replace						
	
	* 61 *
	use eba_vt_61_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="usa" $graph_options title("USA")
	graph save vt_h61c.gph, replace
	hist tstat if var=="usa" $graph_options title("USA")	
	graph save vt_h61t.gph, replace						
									
	* 62 *
	use eba_vt_62_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="violence" $graph_options title("Violence")
	graph save vt_h62c.gph, replace
	hist tstat if var=="violence" $graph_options title("Violence")	
	graph save vt_h62t.gph, replace						
									
	* 63 *
	use eba_vt_63_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="votingage" $graph_options title("Voting age")
	graph save vt_h63c.gph, replace
	hist tstat if var=="votingage" $graph_options title("Voting age")	
	graph save vt_h63t.gph, replace						
									
	* 64 *
	use eba_vt_64_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="west" $graph_options title("West")
	graph save vt_h64c.gph, replace
	hist tstat if var=="west" $graph_options title("West")	
	graph save vt_h64t.gph, replace						
									
	* 65 *
	use eba_vt_65_aws.dta, clear
	 drop if vif1>7
	hist coef if var=="y1919_1994" $graph_options title("Years 1919-1994")
	graph save vt_h65c.gph, replace
	hist tstat if var=="y1919_1994" $graph_options title("Years 1919-1994")	
	graph save vt_h65t.gph, replace						
	

	* 66 * 
	run "/Users/rich/Dropbox/research/Rich & Ferran/EBA turnout/do/results/VT results by var/VT gen core five var.do"
	global graph_options ",  xline(0, lcolor(red)) ytitle("") xtitle("") normal gap(25) ylabel(, angle(0) labsize(small))"
	clear
	use "/Users/rich/Dropbox/research/Rich & Ferran/EBA turnout/data/completed data/completed AWS data files (cleaned)/core_comp.dta"
	drop if _id==.
	drop title marginsok vce depvar cmd properties predict model ///
	estat_cmd vcetype clustvar 
	drop if vif1>7				
	hist coef if var=="comp" $graph_options title("Compulsory voting") saving(h66c, replace)
	hist tstat if var=="comp" $graph_options title("Compulsory voting") saving(h66t, replace)
		
	* 67 *
	run "/Users/rich/Dropbox/research/Rich & Ferran/EBA turnout/do/results/VT results by var/VT gen core five var.do"
	global graph_options ",  xline(0, lcolor(red)) ytitle("") xtitle("") normal gap(25) ylabel(, angle(0) labsize(small))"
	clear
	use "/Users/rich/Dropbox/research/Rich & Ferran/EBA turnout/data/completed data/completed AWS data files (cleaned)/core_vt_lag.dta"
	drop if _id==.
	drop title marginsok vce depvar cmd properties predict model ///
	estat_cmd vcetype clustvar 
	drop if vif1>7	
	hist coef if var=="vt_lag" $graph_options title("Lagged DV") saving(h67c, replace)
	hist tstat if var=="vt_lag" $graph_options title("Lagged DV") saving(h67t, replace)
	
	* 68 *
	run "/Users/rich/Dropbox/research/Rich & Ferran/EBA turnout/do/results/VT results by var/VT gen core five var.do"
	global graph_options ",  xline(0, lcolor(red)) ytitle("") xtitle("") normal gap(25) ylabel(, angle(0) labsize(small))"
	clear	
	use "/Users/rich/Dropbox/research/Rich & Ferran/EBA turnout/data/completed data/completed AWS data files (cleaned)/core_pr.dta"
	drop if _id==.
	drop title marginsok vce depvar cmd properties predict model ///
	estat_cmd vcetype clustvar 
	drop if vif1>7	
	hist coef if var=="pr" $graph_options title("Proportional representation") saving(h68c, replace)
	hist tstat if var=="pr" $graph_options title("Proportional representation") saving(h68t, replace)
	
	* 69 *
	run "/Users/rich/Dropbox/research/Rich & Ferran/EBA turnout/do/results/VT results by var/VT gen core five var.do"
	global graph_options ",  xline(0, lcolor(red)) ytitle("") xtitle("") normal gap(25) ylabel(, angle(0) labsize(small))"
	clear		
	use "/Users/rich/Dropbox/research/Rich & Ferran/EBA turnout/data/completed data/completed AWS data files (cleaned)/core_gni_ln_sl.dta"
	drop if _id==.
	drop title marginsok vce depvar cmd properties predict model ///
	estat_cmd vcetype clustvar 
	drop if vif1>7	
	hist coef if var=="gni_ln_sl" $graph_options title("GNI") saving(h69c, replace)
	hist coef if var=="gni_ln_sl" $graph_options title("GNI") saving(h69t, replace)
		
	* 70 *
	run "/Users/rich/Dropbox/research/Rich & Ferran/EBA turnout/do/results/VT results by var/VT gen core five var.do"
	global graph_options ",  xline(0, lcolor(red)) ytitle("") xtitle("") normal gap(25) ylabel(, angle(0) labsize(small))"
	clear
	use "/Users/rich/Dropbox/research/Rich & Ferran/EBA turnout/data/completed data/completed AWS data files (cleaned)/core_pop_ln_sl.dta"
	drop if _id==.
	drop title marginsok vce depvar cmd properties predict model ///
	estat_cmd vcetype clustvar 
	drop if vif1>7	
	hist coef if var=="pop_ln_sl" $graph_options title("Population") saving(h70c, replace)
	hist coef if var=="pop_ln_sl" $graph_options title("Population") saving(h70t, replace)
		
	 
